﻿Public Class FrmRptPlanCuentas

    Private dtPlanCta As DataTable

    Sub New(ByRef dtPlanCta As DataTable)

        ' Llamada necesaria para el diseñador.
        InitializeComponent()
        Me.dtPlanCta = dtPlanCta
        ' Agregue cualquier inicialización después de la llamada a InitializeComponent().

    End Sub

    Private Sub FrmRptPlanCuentas_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        RptContabilidad.RptPlanCuentas(rvPlanCta, dtPlanCta)
        Me.rvPlanCta.RefreshReport()
    End Sub
End Class